home *** CD-ROM | disk | FTP | other *** search
/ El Mac 1 / Magazine.iso / EL MAC 1 / Infotenimiento / Blender / SHARED.Dir / 00774.ls < prev    next >
Encoding:
Text File  |  1995-09-13  |  247 b   |  14 lines
  1. on mouseUp
  2.   global move, s, ADSET
  3.   sound playFile 2, "thfwz.AIF"
  4.   set move to 1
  5.   repeat with s = 48 down to 1
  6.     puppetSprite(s, 0)
  7.   end repeat
  8.   if the shiftDown = 0 then
  9.     go("OPEN", ADSET)
  10.   else
  11.     go("OPEN", "CONTENTS")
  12.   end if
  13. end
  14.